package cn.leida.ruoyi.system.service.impl;

import cn.leida.ruoyi.common.annotation.DataScope;
import cn.leida.ruoyi.common.config.AppConfig;
import cn.leida.ruoyi.common.constant.UserConstants;
import cn.leida.ruoyi.common.core.domain.TreeSelect;
import cn.leida.ruoyi.common.core.domain.entity.SysDept;
import cn.leida.ruoyi.common.core.domain.entity.SysRole;
import cn.leida.ruoyi.common.core.domain.entity.SysUser;
import cn.leida.ruoyi.common.core.page.TableSupport;
import cn.leida.ruoyi.common.enums.UserStatus;
import cn.leida.ruoyi.common.exception.CustomException;
import cn.leida.ruoyi.common.exception.ServiceException;
import cn.leida.ruoyi.common.utils.SecurityUtils;
import cn.leida.ruoyi.common.utils.code.BusinessBizCode;
import cn.leida.ruoyi.common.utils.spring.SpringUtils;
import cn.leida.ruoyi.system.dao.SysDeptDao;
import cn.leida.ruoyi.system.dao.SysRoleDao;
import cn.leida.ruoyi.system.service.ISysDeptService;
import jakarta.persistence.criteria.CriteriaBuilder;
import jakarta.persistence.criteria.CriteriaQuery;
import jakarta.persistence.criteria.Predicate;
import jakarta.persistence.criteria.Root;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.data.domain.Page;
import org.springframework.data.domain.Sort;
import org.springframework.data.jpa.domain.Specification;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;

import java.util.ArrayList;
import java.util.Iterator;
import java.util.List;
import java.util.stream.Collectors;
import cn.leida.ruoyi.common.utils.DateUtils;
import cn.leida.ruoyi.common.utils.StringUtils;
import cn.leida.ruoyi.common.core.text.Convert;

/**
 * 部门管理 服务实现
 *
 * @author liutietou
 * @since 1.0  2020-12-11
 */
@Transactional(readOnly = true)
@Service
public class SysDeptServiceImpl implements ISysDeptService {

    @Autowired
    private SysDeptDao sysDeptDao;

    @Autowired
    private SysRoleDao sysRoleDao;

    /**
     * 查询部门管理数据
     *
     * @param req 部门信息
     * @return 部门信息集合
     */
    @Override
    @DataScope(deptAlias = "d")
    public List<SysDept> selectDeptList(SysDept req) {
        Sort sort = Sort.by(Sort.Order.asc("orderNum"));
        return sysDeptDao.findAll(querySysDept(req) ,sort);
    }

    /**
     * 构建前端所需要树结构
     *
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<SysDept> buildDeptTree(List<SysDept> depts) {
        List<SysDept> returnList = new ArrayList<>();
        List<Long> tempList = new ArrayList<>();
        for (SysDept dept : depts) {
            tempList.add(dept.getDeptId());
        }
        for (Iterator<SysDept> iterator = depts.iterator(); iterator.hasNext(); ) {
            SysDept dept = iterator.next();
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(dept.getParentId())) {
                recursionFn(depts, dept);
                returnList.add(dept);
            }
        }
        if (returnList.isEmpty()) {
            returnList = depts;
        }
        return returnList;
    }

    /**
     * 构建前端所需要下拉树结构
     *
     * @param depts 部门列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<SysDept> depts) {
        List<SysDept> deptTrees = buildDeptTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 根据角色ID查询部门树信息
     *
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Long> selectDeptListByRoleId(Long roleId) {
        SysRole role = sysRoleDao.findByRoleId(roleId);
        //部门树选择项是否关联显示（0：父子不互相关联显示 1：父子互相关联显示 ）
        if (role.isDeptCheckStrictly()) {
            return sysDeptDao.findDeptCheckListByRoleId(roleId);
        }
        return sysDeptDao.findDeptListByRoleId(roleId);
    }

    /**
     * 根据部门ID查询信息
     *
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public SysDept selectDeptById(Long deptId) {
        SysDept sysDept = sysDeptDao.findById(deptId).orElse(new SysDept());
        return sysDept;
    }

    /**
     * 根据ID查询所有子部门（正常状态）
     *
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public int selectNormalChildrenDeptById(Long deptId) {
        if (AppConfig.sqlite()) {
            return sysDeptDao.findSqliteNormalChildrenDeptById(deptId, deptId, deptId, deptId);
        }
        int count = sysDeptDao.findNormalChildrenDeptById(deptId);
        return count;
    }

    /**
     * 是否存在子节点
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Long deptId) {
        int result = sysDeptDao.hasChildByDeptId(deptId);
        return result > 0 ? true : false;
    }

    /**
     * 查询部门是否存在用户
     *
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Long deptId) {
        int result = sysDeptDao.checkDeptExistUser(deptId);
        return result > 0 ? true : false;
    }

    /**
     * 校验部门名称是否唯一
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public boolean checkDeptNameUnique(SysDept dept) {
        Long deptId = StringUtils.isNull(dept.getDeptId()) ? -1L : dept.getDeptId();
        List<SysDept> sysDepts = sysDeptDao.findByParentIdAndDeptName(dept.getParentId(), dept.getDeptName());
        if (!sysDepts.isEmpty() && sysDepts.get(0).getDeptId().longValue() != deptId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 新增保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Transactional(rollbackFor = Exception.class)
    @Override
    public int insertDept(SysDept dept) {
        SysDept info = sysDeptDao.findById(dept.getParentId()).orElse(new SysDept());
        // 如果父节点不为正常状态,则不允许新增子节点
        if (!UserConstants.DEPT_NORMAL.equals(info.getStatus())) {
            throw new CustomException("部门停用，不允许新增");
        }
        dept.setAncestors(info.getAncestors() + "," + dept.getParentId());
        dept.setDelFlag(UserStatus.OK.getCode());
        dept.initCreateTime();
        sysDeptDao.save(dept);
        return BusinessBizCode.OPTION_SUCCESS.getCode();
    }

    /**
     * 修改保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Transactional(readOnly = false, rollbackFor = Exception.class)
    @Override
    public int updateDept(SysDept dept) {
        SysDept newParentDept = sysDeptDao.findById(dept.getParentId()).orElse(new SysDept());
        SysDept oldDept = sysDeptDao.findById(dept.getDeptId()).orElse(new SysDept());
        if (StringUtils.isNotNull(newParentDept) && StringUtils.isNotNull(oldDept)) {
            String newAncestors = newParentDept.getAncestors() + "," + newParentDept.getDeptId();
            String oldAncestors = oldDept.getAncestors();
            dept.setAncestors(newAncestors);
            updateDeptChildren(dept.getDeptId(), newAncestors, oldAncestors);
        }
        sysDeptDao.save(dept);
        if (UserConstants.DEPT_NORMAL.equals(dept.getStatus())) {
            // 如果该部门是启用状态，则启用该部门的所有上级部门
            updateParentDeptStatus(dept);
        }
        return BusinessBizCode.OPTION_SUCCESS.getCode();
    }

    /**
     * 修改该部门的父级部门状态
     *
     * @param dept 当前部门
     */
    private void updateParentDeptStatus(SysDept dept) {
        String updateBy = dept.getUpdateBy();
        dept = sysDeptDao.findById(dept.getDeptId()).orElse(new SysDept());
        dept.setUpdateBy(updateBy);
        sysDeptDao.save(dept);
    }

    /**
     * 修改子元素关系
     *
     * @param deptId       被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    @Transactional(readOnly = false, rollbackFor = Exception.class)
    public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors) {
        List<SysDept> children;
        if (AppConfig.sqlite()) {
            children = sysDeptDao.findSqliteChildrenDeptById(deptId, deptId, deptId, deptId);
        } else {
            children = sysDeptDao.findChildrenDeptById(deptId);
        }
        for (SysDept child : children) {
            child.setAncestors(child.getAncestors().replace(oldAncestors, newAncestors));
        }
        if (children.size() > 0) {
            sysDeptDao.saveAll(children);
        }
    }

    /**
     * 删除部门管理信息
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Transactional(readOnly = false, rollbackFor = Exception.class)
    @Override
    public int deleteDeptById(Long deptId) {
        sysDeptDao.deleteById(deptId);
        return BusinessBizCode.OPTION_SUCCESS.getCode();
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<SysDept> list, SysDept t) {
        // 得到子节点列表
        List<SysDept> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysDept tChild : childList) {
            if (hasChild(list, tChild)) {
                recursionFn(list, tChild);
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysDept> getChildList(List<SysDept> list, SysDept t) {
        List<SysDept> tlist = new ArrayList<>();
        Iterator<SysDept> it = list.iterator();
        while (it.hasNext()) {
            SysDept n = it.next();
            if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getDeptId().longValue()) {
                tlist.add(n);
            }
        }
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysDept> list, SysDept t) {
        return getChildList(list, t).size() > 0 ? true : false;
    }


    /**
     * 校验部门是否有数据权限
     *
     * @param deptId 部门id
     */
    @Override
    public void checkDeptDataScope(Long deptId) {
        if (!SysUser.isAdmin(SecurityUtils.getUserId()) && StringUtils.isNotNull(deptId)) {
            SysDept dept = new SysDept();
            dept.setDeptId(deptId);
            List<SysDept> depts = SpringUtils.getAopProxy(this).selectDeptList(dept);
            if (StringUtils.isEmpty(depts)) {
                throw new ServiceException("没有权限访问部门数据！");
            }
        }
    }

    /**
     * 查询部门树结构信息
     *
     * @param dept 部门信息
     * @return 部门树信息集合
     */
    @Override
    public List<TreeSelect> selectDeptTreeList(SysDept dept) {
        List<SysDept> depts = SpringUtils.getAopProxy(this).selectDeptList(dept);
        return buildDeptTreeSelect(depts);
    }

    /**
     * 根据条件分页查询字典数据
     *
     * @param req 字典数据信息
     * @return 字典数据集合信息
     */
    public Page<SysDept> findDeptList(SysDept req) {
        return sysDeptDao.findAll(querySysDept(req), TableSupport.pageSortDesc("createTime"));
    }

    /**
     * 根据条件分页查询字典数据
     *
     * @param req 字典数据信息
     * @return 字典数据集合信息
     */
    public Specification<SysDept> querySysDept(SysDept req) {

        Specification<SysDept> example = new Specification<SysDept>() {
            private static final long serialVersionUID = 1L;

            @Override
            public Predicate toPredicate(Root<SysDept> root, CriteriaQuery<?> query, CriteriaBuilder cb) {
                List<Predicate> list = new ArrayList<>();
                if (StringUtils.isNoneBlank(req.getDeptName())) {
                    Predicate pre = cb.like(root.get("deptName").as(String.class), "%" + req.getDeptName() + "%");
                    list.add(pre);
                }
                if (req.getParentId() != null) {
                    Predicate pre = cb.equal(root.get("parentId").as(String.class), req.getParentId());
                    list.add(pre);
                }
                if (StringUtils.isNoneBlank(req.getStatus())) {
                    Predicate pre = cb.equal(root.get("status").as(String.class), req.getStatus());
                    list.add(pre);
                }
                if (list.isEmpty()) {
                    return null;
                }
                return cb.and(list.toArray(new Predicate[0]));
            }
        };
        return example;
    }

}
